Savor the Moment - Entert…ing Without Reservations/Savoe the Moment - Entertaining Without Reservations.iso/pc/CookCommite.dxr/00022.ls

Text File | 1999-10-03 | 329 b | 14 lines

on mouseDown
  tell window("miaw")
    if the soundEnabled = 1 then
      member("loop").volume = 0
      pause(member("loop"))
      set the soundEnabled to not (the soundEnabled)
    else
      member("loop").volume = 150
      play frame member("loop")
      set the soundEnabled to the soundEnabled
    end if
  end tell
end